home *** CD-ROM | disk | FTP | other *** search
/ Exploring Where & Why / Exploring Where & Why.iso / pc / MAIN.DIR / Internal_128_jump from the main menu.ls < prev    next >
Encoding:
Text File  |  2004-07-12  |  567 b   |  24 lines
  1. on mouseDown
  2.   global gUI
  3.   puppetSprite(30, 0)
  4.   clearLocalHandCursors()
  5.   puppetSound("button noise", 1)
  6.   lessonNum = member(the member of sprite the clickOn).name
  7.   targetFrame = "L" & lessonNum
  8.   put targetFrame
  9.   killActorList()
  10.   updateStage()
  11.   jumpNum = value(lessonNum) mod 2
  12.   titleSound = targetFrame & "TTL.AIF"
  13.   unloadMember()
  14.   unload()
  15.   waitFXSound()
  16.   puppetSound(2, 0)
  17.   goLevel(gUI, integer(lessonNum), "MainAnim")
  18. end
  19.  
  20. on mouseEnter me
  21.   theSoundName = member(the member of sprite me.spriteNum).name
  22.   puppetSound(1, "INTRO" & theSoundName)
  23. end
  24.